home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ShareWare OnLine 2
/
ShareWare OnLine Volume 2 (CMS Software)(1993).iso
/
os2
/
sde_300.zip
/
MASK.XM!
< prev
next >
Wrap
Text File
|
1993-02-09
|
402b
|
21 lines
@Comment{External macro to set directory file mask}
@Set
{
(newmask)
(
@Menu
{
(All)(*.*)
(Name of hilited)(@Hilited(N).*)
(Ext of hilited)(*.@Hilited(E))
(Input name)(@Prompt(Name for mask)@Input().*)
(Specified ext)(@Prompt(Ext for mask)*.@Input())
(Given mask)(@Prompt(Mask)@Input())
}
)
}
@Key(ENTER @Val(newmask) ENTER)